---
title: "Scatter plot of air pollution and brain marker"
output:
flexdashboard::flex_dashboard:
orientation: columns
vertical_layout: fill
social: menu
source_code: embed
---
```{r setup, include=FALSE}
library(flexdashboard)
# prepare the data
source("functions/scatter_plot.R")
```
{.sidebar}
-----------------------------------------------------------------------
```{r}
```
Longitudinal plot
=======================================================================
Column {data-width=650}
-----------------------------------------------------------------------
### Chart A
```{r}
```
Column {data-width=350}
-----------------------------------------------------------------------
### Chart B
```{r}
```
### Chart C
```{r}
```